FT_LDAY()
 Return last day of the month
------------------------------------------------------------------------------

 Syntax

      FT_LDAY( [ <dDateToChk> ] ) -> dLastDay

 Arguments

     <dDateToChk> is a date within a month for which you want to find
     the last date of that month.  If not passed or is an incorrect
     type, defaults to current system date.

 Returns

     A Clipper date value representing the last date of the month.

 Description

     This function will return the last day of the month of the date
     passed, or the last day of the current month if no argument is
     supplied.

 Examples

     dDate := CTOD( "09/15/90" )
     ? FT_LDAY( dDate )             // 09/30/90
     ? FT_LDAY()                    // 03/31/91  (current month)

 Source: LASTDAY.PRG

 Author: Mike Schinkel